polcar
polcar(m)
Func
factor(det(m-x*identity(rowDim())),x)   (vous pouvez bien-sûr faire det(X*I-M) )
EndFunc